! name: f.ajt03
! type: ArchiCAD Door File
! ***** 3D script *****


mat1 = c
mat2 = d
tsz = e
tm = f
am = g

prism_   15, 0.045, 

    -a/2+tsz-0.01, 0.005, 15,
     a/2-tsz+0.01, 0.005, 15,
     a/2-tsz+0.01, am-tsz+0.01, 15,
    -a/2+tsz-0.01, am-tsz+0.01, 15,
    -a/2+tsz-0.01, 0.005, -1,

    -a/2+tsz-0.01+0.12, 0.25, 15,
     a/2-tsz+0.01-0.12, 0.25, 15,
     a/2-tsz+0.01-0.12, 0.665, 15,
    -a/2+tsz-0.01+0.12, 0.665, 15,
    -a/2+tsz-0.01+0.12, 0.25, -1,


    -a/2+tsz-0.01+0.12, 0.785, 15,
     a/2-tsz+0.01-0.12, 0.785, 15,
     a/2-tsz+0.01-0.12, am-tsz+0.01-0.12, 15,
    -a/2+tsz-0.01+0.12, am-tsz+0.01-0.12, 15,
    -a/2+tsz-0.01+0.12, 0.785, -1

addz (0.045-0.007)/2

material mat1

prism_ 5, 0.007,
    -a/2+tsz-0.01+0.12, 0.25, 15,
     a/2-tsz+0.01-0.12, 0.25, 15,
     a/2-tsz+0.01-0.12, 0.665, 15,
    -a/2+tsz-0.01+0.12, 0.665, 15,
    -a/2+tsz-0.01+0.12, 0.25, -1
 
prism_ 5, 0.007,
    -a/2+tsz-0.01+0.12, 0.785, 15,
     a/2-tsz+0.01-0.12, 0.785, 15,
     a/2-tsz+0.01-0.12, am-tsz+0.01-0.12, 15,
    -a/2+tsz-0.01+0.12, am-tsz+0.01-0.12, 15,
    -a/2+tsz-0.01+0.12, 0.785, -1

del 1
 
addz 0.045
addy 0.95
addx -a/2+tsz-0.01+0.06

call "handle_1" mat2

addz -0.045
mulz -1

call "handle_1" mat2
